home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id007.dxr / 00033.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  1.1 KB  |  33 lines

  1. on exitFrame
  2.   unLoad(105, 109)
  3.   repeat with n = 1 to 30
  4.     set the visible of sprite n to 1
  5.   end repeat
  6.   set the locH of sprite 4 to the locH of sprite 4 + random(2)
  7.   set the locH of sprite 4 to the locH of sprite 4 - random(2)
  8.   set the locH of sprite 5 to the locH of sprite 5 + random(2)
  9.   set the locH of sprite 5 to the locH of sprite 5 - random(2)
  10.   set the locH of sprite 6 to the locH of sprite 6 + random(2)
  11.   set the locH of sprite 6 to the locH of sprite 6 - random(2)
  12.   set the locH of sprite 7 to the locH of sprite 7 + random(2)
  13.   set the locH of sprite 7 to the locH of sprite 7 - random(2)
  14.   set the locH of sprite 8 to the locH of sprite 8 + random(2)
  15.   set the locH of sprite 8 to the locH of sprite 8 - random(2)
  16.   set the locV of sprite 8 to the locV of sprite 8 + random(2)
  17.   set the locV of sprite 8 to the locV of sprite 8 - random(2)
  18.   updateStage()
  19.   if the timer < 2200 then
  20.     go(the frame)
  21.   else
  22.     go(the frame + 1)
  23.   end if
  24.   go(the frame)
  25. end
  26.  
  27. on mouseUp
  28.   set the visible of sprite 5 to 0
  29.   set the visible of sprite 6 to 0
  30.   set the visible of sprite 7 to 0
  31.   go(81)
  32. end
  33.